home *** CD-ROM | disk | FTP | other *** search
/ United Public Domain Gold 2 / United Public Domain Gold 2.iso / utilities / pu634.dms / pu634.adf / InstallGenies < prev    next >
Text File  |  1994-09-06  |  5KB  |  224 lines
  1. alias bold  echo "*E[1m" NOLINE
  2. alias ital  echo "*E[3m" NOLINE
  3. alias norm  echo "*E[0m" 
  4.  
  5. echo " "
  6. echo "             STAR TECK GENIES INSTALLATION / DE-INSTALLATION"
  7. echo "             ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"
  8. echo " "
  9. echo "  This procedure will automatically copy the Star Teck Genies to your;"
  10. echo "                           REXX: directory."
  11. echo "  If this is not were you've installed your Professional Draw Genies"
  12. echo "  then stop this installation now! (see manual installation instructions)"
  13. echo "  This procedure also copies these associated files;"
  14. echo "  GridSet.STk, ScaleList.STk and ZoomList.STk to your SYS:S directory."
  15. echo " "
  16. echo "  48,640 bytes ( 95 blocks) of free space is needed for Genie installation."
  17. echo "   3,072 bytes (  6 blocks) for "SYS:S" directory installation."
  18. echo "  51,712 bytes (101 blocks) TOTAL"
  19. echo " "
  20. echo "  If you would like to install genies, choose Yes"
  21. echo "  If you would rather quit this proceedure or de-install genies, choose No"
  22. ask  "                                  [y/N] ?"
  23. if not warn
  24.     echo  "             Would you like to De-install Star Teck Genies?"
  25.     ask  "                                  [y/N] ?"
  26.     if warn
  27.         SKIP deinstall
  28.     else
  29.         echo "Goodbye..."
  30.         endcli > nil:
  31.     endif
  32. endif
  33.  
  34. echo " "
  35.  
  36.  
  37. bold
  38. echo "                         Installing Star Teck Genies"
  39. norm
  40. echo " "
  41. ital
  42. copy GENIES/EmbossEngrave.pdrx     to REXX:
  43. echo "copy GENIES/EmbossEngrave.pdrx     to REXX:"
  44. copy GENIES/GridSet.pdrx           to REXX:
  45. echo "copy GENIES/GridSet.pdrx           to REXX:"
  46. copy GENIES/PieChart.pdrx          to REXX:
  47. echo "copy GENIES/PieChart.pdrx          to REXX:"
  48. copy GENIES/ScalePercent.pdrx      to REXX:
  49. echo "copy GENIES/ScalePercent.pdrx      to REXX:"
  50. copy GENIES/SelectByAttribute.pdrx to REXX:
  51. echo "copy GENIES/SelectByAttribute.pdrx to REXX:"
  52. copy GENIES/Star.pdrx              to REXX:
  53. echo "copy GENIES/Star.pdrx              to REXX:"
  54. copy GENIES/ZoomWindow.pdrx        to REXX:
  55. echo "copy GENIES/ZoomWindow.pdrx        to REXX:"
  56.  
  57. copy GENIES/S/GridSet.STk   SYS:S
  58. echo "copy GENIES/S/GridSet.STk   SYS:S"
  59. copy GENIES/S/ScaleList.STk SYS:S
  60. echo "copy GENIES/S/ScaleList.STk SYS:S"
  61. copy GENIES/S/ZoomList.STk  SYS:S
  62. echo "copy GENIES/S/ZoomList.STk  SYS:S"
  63.  
  64. norm
  65. bold
  66. echo ""
  67. echo ""
  68.  
  69. echo "    Would you also like to be able to run these genies from the tool menu?"
  70. norm
  71.  
  72. echo ""
  73. echo "        GridSet           by double clicking on the ADD POINTS TOOL"
  74. echo "        ScalePercent      by double clicking on the CUT POINTS TOOL"
  75. echo "        Zoom Window       by double clicking on the FREEHAND   TOOL"
  76. echo ""
  77. echo "    This procedure is HIGHLY RECOMMENDED for optimum production!"
  78. echo ""
  79. echo "    You will need 11,264 bytes (22 blocks) of free space for installation."
  80. echo ""
  81. ask  "             Would you like this done for you [y/N] ?"
  82.  
  83. if warn
  84.     ital
  85.     copy REXX:GridSet.pdrx      to REXX:_PD_TOOLS_ADDP.pdrx
  86. echo "copy REXX:GridSet.pdrx      to REXX:_PD_TOOLS_ADDP.pdrx"    
  87.     copy REXX:ScalePercent.pdrx to REXX:_PD_TOOLS_CUTP.pdrx
  88. echo "copy REXX:ScalePercent.pdrx to REXX:_PD_TOOLS_CUTP.pdrx"    
  89.     copy REXX:ZoomWindow.pdrx   to REXX:_PD_TOOLS_FREE.pdrx
  90. echo "copy REXX:ZoomWindow.pdrx   to REXX:_PD_TOOLS_FREE.pdrx"    
  91. endif
  92.  
  93.  
  94.  
  95.  
  96.  
  97. norm
  98.  
  99.  
  100. if GE WARN
  101.      bold
  102.         echo "          Sorry there were errors during the Installation!"
  103.         echo "                 see manual installation instructions."
  104.      norm
  105.      endcli >NIL:
  106.  
  107. endif
  108.  
  109. echo ""
  110. echo ""
  111. echo " "
  112. echo " "
  113. bold
  114. echo "                            Genie installation Completed!"
  115. norm
  116. echo " "
  117. echo " "
  118. echo "                                 Star Teck Genies"
  119. echo "                       are now ready for your productive use"
  120. echo "               Be sure to mail in your shareware dues (real affordable)."
  121. echo "                         Your comments would be appreciated."
  122. echo " "
  123. echo " "
  124. echo " "
  125. echo "                                      ENJOY!"
  126. echo " "
  127.  
  128. ask  "                            Press RETURN to proceed..."
  129.  
  130. endcli >NIL:
  131.  
  132.  
  133. lab deinstall
  134.  
  135. ital
  136. if exists rexx:EmbossEngrave.pdrx
  137.     del rexx:EmbossEngrave.pdrx
  138.   endif
  139.  
  140. if exists rexx:GridSet.pdrx
  141.     del rexx:GridSet.pdrx
  142.   endif
  143.  
  144. if exists rexx:PieChart.pdrx
  145.     del rexx:PieChart.pdrx
  146.   endif
  147.  
  148. if exists rexx:ScalePercent.pdrx
  149.     del rexx:ScalePercent.pdrx
  150.   endif
  151.  
  152. if exists rexx:SelectByAttribute.pdrx
  153.     del rexx:SelectByAttribute.pdrx
  154.   endif
  155.  
  156. if exists rexx:Star.pdrx
  157.     del rexx:Star.pdrx
  158.   endif
  159.  
  160. if exists rexx:ZoomWindow.pdrx
  161.     del rexx:ZoomWindow.pdrx
  162.   endif
  163.  
  164.  
  165. if exists s:GridSet.STk
  166.     del s:GridSet.STk
  167.   endif
  168.  
  169. if exists s:ScaleList.STk
  170.     del s:ScaleList.STk
  171.   endif
  172.  
  173. if exists s:ZoomList.STk
  174.     del s:ZoomList.STk
  175.   endif
  176.  
  177. echo ""
  178.  
  179. norm
  180. ask "               Did you install the tool genies [y/N] ?"
  181. if not warn
  182.  
  183. else
  184.     ital
  185.     if exists rexx:_PD_TOOLS_ADDP.pdrx
  186.         del rexx:_PD_TOOLS_ADDP.pdrx
  187.     endif
  188.  
  189.     if exists rexx:_PD_TOOLS_CUTP.pdrx
  190.         del rexx:_PD_TOOLS_CUTP.pdrx
  191.       endif
  192.  
  193.     if exists rexx:_PD_TOOLS_FREE.pdrx
  194.         del rexx:_PD_TOOLS_FREE.pdrx
  195.       endif
  196. endif
  197.  
  198.  
  199. echo ""
  200. echo ""
  201. echo " "
  202. echo " "
  203. norm
  204. bold
  205. echo ""
  206. echo ""
  207. echo ""
  208. echo "                         Genie De-installation Completed!"
  209. norm
  210. ital
  211. echo ""
  212. echo ""
  213. echo "                  Please pass a copy of this archive to friends."
  214. norm
  215. echo ""
  216. echo ""
  217. echo  "                            Press RETURN to proceed..."
  218. echo ""
  219. echo ""
  220. echo ""
  221. echo ""
  222. ask ""
  223. endcli >nil:
  224.